home *** CD-ROM | disk | FTP | other *** search
Gui4CLI script | 1998-06-24 | 851 b | 40 lines |
- G4C
-
- winbig -1 -1 125 19 ""
- wintype 0000100
- varpath "climaster/*/routine.g"
-
- xonload
- guiopen requester.g
-
- xonopen
- guiwindow requester.g wait
- loadimage cmst:icons/logo 1 noremap
- run 'resident c:filenote pure add'
- run 'resident c:copy pure add'
- run 'resident c:list pure add'
- guiload cmst:modules/routine.g
- guiload cmst:modules/functions.g
- guiload cmst:modules/hotdir.g
- guiload cmst:modules/runreq.g
- guiload cmst:modules/dms.g
- guiwindow requester.g resume
- ifexists file cmst:config/functions
- lvuse climaster 6
- lvchange cmst:config/functions
- else
- gosub routine.g funclist
- lvuse climaster 6
- lvchange env:flist
- lvsort asc
- delete env:flist
- endif
- lvuse climaster 2
- gosub climaster update
- guiquit requester.g
-
- ctext 10 4 "SETTING UP..." topaz.font 8 2 0 01011
- box 0 0 0 0 out icondrop
-
- ; -----------------------------------------
-